home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / c / gcc263-inclib.lha / gnu / geninline / mklibamiga / gluesrc2.lha / FWritef.S < prev    next >
Encoding:
Text File  |  1994-08-27  |  186 b   |  17 lines
  1.  
  2. #include <bases.h>
  3.  
  4.     .text
  5.  
  6.     .globl    _FWritef
  7.  
  8. _FWritef:
  9.     moveml    d2/d3/a6,sp@-
  10.     GETDOSBASE
  11.     moveml    sp@(16:W),d1/d2
  12.     moveql    #24,d3
  13.     addl    sp,d3
  14.     jsr    a6@(-348:W)
  15.     moveml    sp@+,d2/d3/a6
  16.     rts
  17.